

	* APPENDIX 11: Effective Party Cues for Ideologically Out of Sync Partisans: Alternative Operationalization
	
	cd "$data"
	use "data1.dta", clear 
	
eststo M1: regress shiftw6w7_LR i.pid6##i.leftright6, robust // model 1

eststo M2: regress shiftw6w7_LR i.Labouridentification6_##i.leftRightW6, robust // model 2
	
cd "$data"
esttab M1 M2 using "${tables}/Table11_1.tex", b(3) se(3) nogap replace
	
	
gen labourdistribution_lr = leftRightW6 if pid6==2 // for the histogram in marginsplot (distribution of LR among Labour identifiers)

	regress shiftw6w7_LR i.Labouridentification6_##i.leftRightW6, robust
	margins, dydx(Labouridentification6_) at(leftRightW6=(0(1)10))
	marginsplot, plot1opts(color(cranberry) lpattern(shortdash)) recast(scatter) recastci(rspike) level(95) yline(0, lpattern(solid)) ci1opts(color(cranberry%50)) title("", size(2.5)) ytitle("AME of Labour identification on shift in left-right between wave 6 and 7", size(2)) xtitle("left-right self-placement in wave 6", size(2)) addplot(histogram labourdistribution_lr, percent color(cranberry%50) yaxis(2) ytitle("percent", size(2) axis(2)) yscale(range(0(10)70) axis(2) alt)) legend(off)
	
	graph save "${figures}/figure11_1.gph", replace 

	